﻿Namespace Catalog
    Public Class DjProfile
        Inherits BaseObject
        Public Property PersonId As Integer

        Public Sub New()
        End Sub

        Public Sub New(id As Integer, name As String, slug As String, personId As Integer)
            Me.ID = id
            Me.Name = name
            Me.Slug = slug
            Me.PersonId = personId
        End Sub
    End Class
End Namespace